home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / maindata.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  1.1 KB  |  28 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #include <vcl.h>
  7. #pragma hdrstop
  8.  
  9. #include "maindata.h"
  10. //---------------------------------------------------------------------------
  11. #pragma resource "*.dfm"
  12. TDMMain *DMMain;
  13. //---------------------------------------------------------------------------
  14. __fastcall TDMMain::TDMMain(TComponent* Owner)
  15.   : TDataModule(Owner)
  16. {
  17. }
  18. //---------------------------------------------------------------------------
  19. void __fastcall TDMMain::tbOrdersCalcFields(TDataSet *DataSet)
  20. {
  21.    if (tbOrdersEmployeeFirstName->IsNull)
  22.       tbOrdersEmployeeFullName->Value = tbOrdersEmployeeLastName->Value;
  23.    else
  24.       tbOrdersEmployeeFullName->Value = tbOrdersEmployeeFirstName->Value + ' ' +
  25.       tbOrdersEmployeeLastName->Value;
  26.  
  27. }
  28. //---------------------------------------------------------------------